/ MacHome 2000 November / MacHome Magazine Demo Disc November 2000.iso / Software / Utilities / ACME Script Widgets 2.5.1.sea / ACME Script Widgets 2.5.1 / Demo Scripts / timing demo

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 74 69 6d 69 6e 67 | 20 64 65 6d 6f 00 00 00 |..timing| demo...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 54 6f 79 | 53 00 00 00 00 00 00 00 |.TEXTToy|S.......|
|00000050| 00 00 00 00 00 05 c6 00 | 00 01 4a ac 84 e8 32 ac |........|..J...2.|
|00000060| 84 e8 32 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..2.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 a4 8b 00 00 |........|........|
|00000080| 2d 2d 20 74 68 69 73 20 | 69 73 20 61 20 73 69 6d |-- this |is a sim|
|00000090| 70 6c 65 20 73 63 72 69 | 70 74 20 74 6f 20 63 6f |ple scri|pt to co|
|000000a0| 6d 70 61 72 65 20 74 68 | 65 20 70 65 72 66 6f 72 |mpare th|e perfor|
|000000b0| 6d 61 6e 63 65 20 6f 66 | 20 74 68 65 20 54 72 69 |mance of| the Tri|
|000000c0| 6d 0d 2d 2d 20 53 63 72 | 69 70 74 69 6e 67 20 41 |m.-- Scr|ipting A|
|000000d0| 64 64 69 74 69 6f 6e 20 | 61 67 61 69 6e 73 74 20 |ddition |against |
|000000e0| 70 65 72 66 6f 72 6d 69 | 6e 67 20 74 68 65 20 73 |performi|ng the s|
|000000f0| 61 6d 65 20 6f 70 65 72 | 61 74 69 6f 6e 20 77 69 |ame oper|ation wi|
|00000100| 74 68 20 70 75 72 65 20 | 41 70 70 6c 65 53 63 72 |th pure |AppleScr|
|00000110| 69 70 74 0d 2d 2d 20 73 | 74 61 74 65 6d 65 6e 74 |ipt.-- s|tatement|
|00000120| 73 2e 20 49 74 20 72 65 | 71 75 69 72 65 73 20 74 |s. It re|quires t|
|00000130| 68 65 20 53 63 72 69 70 | 74 69 6e 67 20 41 64 64 |he Scrip|ting Add|
|00000140| 69 74 69 6f 6e 20 22 74 | 68 65 20 74 69 63 6b 73 |ition "t|he ticks|
|00000150| 22 20 66 72 6f 6d 20 4a | 6f 6e 20 50 75 67 68 27 |" from J|on Pugh'|
|00000160| 73 0d 2d 2d 20 63 6f 6c | 6c 65 63 74 69 6f 6e 20 |s.-- col|lection |
|00000170| 6f 66 20 6f 73 61 78 65 | 6e 20 63 61 6c 6c 65 64 |of osaxe|n called|
|00000180| 20 22 4a 6f 6e 27 73 20 | 43 6f 6d 6d 61 6e 64 73 | "Jon's |Commands|
|00000190| 22 0d 0d 73 65 74 20 74 | 68 65 54 69 6d 65 73 20 |"..set t|heTimes |
|000001a0| 74 6f 20 7b 7d 0d 0d 2d | 2d 20 73 65 74 20 75 70 |to {}..-|- set up|
|000001b0| 20 74 65 73 74 20 73 74 | 72 69 6e 67 0d 73 65 74 | test st|ring.set|
|000001c0| 20 74 68 65 53 74 72 69 | 6e 67 20 74 6f 20 22 2e | theStri|ng to ".|
|000001d0| 2e 2e 2e 2e 2e 2e 4f 6e | 20 61 20 63 6c 65 61 72 |......On| a clear|
|000001e0| 20 64 61 79 20 79 6f 75 | 20 63 61 6e 20 73 65 65 | day you| can see|
|000001f0| 20 66 6f 72 65 76 65 72 | 20 20 20 20 20 20 22 0d | forever|      ".|
|00000200| 0d 73 65 74 20 73 74 54 | 69 63 6b 73 20 74 6f 20 |.set stT|icks to |
|00000210| 74 68 65 20 74 69 63 6b | 73 20 2d 2d 20 72 65 63 |the tick|s -- rec|
|00000220| 6f 72 64 20 74 69 63 6b | 73 20 62 65 66 6f 72 65 |ord tick|s before|
|00000230| 20 62 65 67 69 6e 6e 69 | 6e 67 0d 0d 73 65 74 20 | beginni|ng..set |
|00000240| 63 75 72 72 65 6e 74 43 | 68 61 72 20 74 6f 20 6c |currentC|har to l|
|00000250| 65 6e 67 74 68 20 6f 66 | 20 74 68 65 53 74 72 69 |ength of| theStri|
|00000260| 6e 67 20 2d 2d 20 73 74 | 72 69 70 20 73 70 61 63 |ng -- st|rip spac|
|00000270| 65 2f 2e 20 66 72 6f 6d | 20 65 6e 64 20 6f 66 20 |e/. from| end of |
|00000280| 73 74 72 69 6e 67 0d 72 | 65 70 65 61 74 20 77 68 |string.r|epeat wh|
|00000290| 69 6c 65 20 28 28 63 68 | 61 72 61 63 74 65 72 20 |ile ((ch|aracter |
|000002a0| 63 75 72 72 65 6e 74 43 | 68 61 72 20 6f 66 20 74 |currentC|har of t|
|000002b0| 68 65 53 74 72 69 6e 67 | 20 3d 20 22 20 22 29 20 |heString| = " ") |
|000002c0| 6f 72 20 c2 0d 09 28 63 | 68 61 72 61 63 74 65 72 |or ...(c|haracter|
|000002d0| 20 63 75 72 72 65 6e 74 | 43 68 61 72 20 6f 66 20 | current|Char of |
|000002e0| 74 68 65 53 74 72 69 6e | 67 20 3d 20 22 20 22 29 |theStrin|g = " ")|
|000002f0| 29 20 c2 0d 09 61 6e 64 | 20 28 63 75 72 72 65 6e |) ...and| (curren|
|00000300| 74 43 68 61 72 20 3e 20 | 30 29 0d 09 73 65 74 20 |tChar > |0)..set |
|00000310| 63 75 72 72 65 6e 74 43 | 68 61 72 20 74 6f 20 28 |currentC|har to (|
|00000320| 63 75 72 72 65 6e 74 43 | 68 61 72 20 2d 20 31 29 |currentC|har - 1)|
|00000330| 0d 65 6e 64 20 72 65 70 | 65 61 74 0d 73 65 74 20 |.end rep|eat.set |
|00000340| 74 68 65 53 74 72 69 6e | 67 20 74 6f 20 63 68 61 |theStrin|g to cha|
|00000350| 72 61 63 74 65 72 73 20 | 31 20 74 68 72 75 20 63 |racters |1 thru c|
|00000360| 75 72 72 65 6e 74 43 68 | 61 72 20 6f 66 20 74 68 |urrentCh|ar of th|
|00000370| 65 53 74 72 69 6e 67 20 | 61 73 20 74 65 78 74 0d |eString |as text.|
|00000380| 0d 73 65 74 20 63 75 72 | 72 65 6e 74 43 68 61 72 |.set cur|rentChar|
|00000390| 20 74 6f 20 31 20 2d 2d | 20 73 74 72 69 70 20 73 | to 1 --| strip s|
|000003a0| 70 61 63 65 2f 2e 20 66 | 72 6f 6d 20 73 74 61 72 |pace/. f|rom star|
|000003b0| 74 20 6f 66 20 73 74 72 | 69 6e 67 0d 72 65 70 65 |t of str|ing.repe|
|000003c0| 61 74 20 77 68 69 6c 65 | 20 28 28 63 68 61 72 61 |at while| ((chara|
|000003d0| 63 74 65 72 20 63 75 72 | 72 65 6e 74 43 68 61 72 |cter cur|rentChar|
|000003e0| 20 6f 66 20 74 68 65 53 | 74 72 69 6e 67 20 3d 20 | of theS|tring = |
|000003f0| 22 2e 22 29 20 6f 72 20 | c2 0d 09 28 63 68 61 72 |".") or |...(char|
|00000400| 61 63 74 65 72 20 63 75 | 72 72 65 6e 74 43 68 61 |acter cu|rrentCha|
|00000410| 72 20 6f 66 20 74 68 65 | 53 74 72 69 6e 67 20 3d |r of the|String =|
|00000420| 20 22 2e 22 29 29 20 c2 | 0d 09 61 6e 64 20 28 63 | ".")) .|..and (c|
|00000430| 75 72 72 65 6e 74 43 68 | 61 72 20 3c 20 6c 65 6e |urrentCh|ar < len|
|00000440| 67 74 68 20 6f 66 20 74 | 68 65 53 74 72 69 6e 67 |gth of t|heString|
|00000450| 29 0d 09 0d 09 73 65 74 | 20 63 75 72 72 65 6e 74 |)....set| current|
|00000460| 43 68 61 72 20 74 6f 20 | 28 63 75 72 72 65 6e 74 |Char to |(current|
|00000470| 43 68 61 72 20 2b 20 31 | 29 0d 65 6e 64 20 72 65 |Char + 1|).end re|
|00000480| 70 65 61 74 0d 73 65 74 | 20 74 68 65 53 74 72 69 |peat.set| theStri|
|00000490| 6e 67 20 74 6f 20 63 68 | 61 72 61 63 74 65 72 73 |ng to ch|aracters|
|000004a0| 20 63 75 72 72 65 6e 74 | 43 68 61 72 20 74 68 72 | current|Char thr|
|000004b0| 75 20 2d 31 20 6f 66 20 | 74 68 65 53 74 72 69 6e |u -1 of |theStrin|
|000004c0| 67 20 61 73 20 74 65 78 | 74 0d 0d 73 65 74 20 74 |g as tex|t..set t|
|000004d0| 68 65 54 69 6d 65 73 20 | 74 6f 20 74 68 65 54 69 |heTimes |to theTi|
|000004e0| 6d 65 73 20 26 20 28 28 | 74 68 65 20 74 69 63 6b |mes & ((|the tick|
|000004f0| 73 29 20 2d 20 73 74 54 | 69 63 6b 73 29 20 2d 2d |s) - stT|icks) --|
|00000500| 20 73 61 76 65 20 65 6e | 64 69 6e 67 20 74 69 63 | save en|ding tic|
|00000510| 6b 73 0d 0d 2d 2d 20 20 | 72 65 73 65 74 20 74 65 |ks..--  |reset te|
|00000520| 73 74 20 73 74 72 69 6e | 67 0d 73 65 74 20 74 68 |st strin|g.set th|
|00000530| 65 53 74 72 69 6e 67 20 | 74 6f 20 22 2e 2e 2e 2e |eString |to "....|
|00000540| 2e 2e 2e 4f 6e 20 61 20 | 63 6c 65 61 72 20 64 61 |...On a |clear da|
|00000550| 79 20 79 6f 75 20 63 61 | 6e 20 73 65 65 20 66 6f |y you ca|n see fo|
|00000560| 72 65 76 65 72 20 20 20 | 20 20 20 22 0d 73 65 74 |rever   |   ".set|
|00000570| 20 73 74 54 69 63 6b 73 | 20 74 6f 20 74 68 65 20 | stTicks| to the |
|00000580| 74 69 63 6b 73 20 2d 2d | 20 67 65 74 20 73 74 61 |ticks --| get sta|
|00000590| 72 74 69 6e 67 20 74 69 | 63 6b 73 0d 73 65 74 20 |rting ti|cks.set |
|000005a0| 74 68 65 53 74 72 69 6e | 67 20 74 6f 20 74 72 69 |theStrin|g to tri|
|000005b0| 6d 20 7b 22 2e 22 2c 20 | 22 20 22 7d 20 6f 66 66 |m {".", |" "} off|
|000005c0| 20 74 68 65 53 74 72 69 | 6e 67 20 66 72 6f 6d 20 | theStri|ng from |
|000005d0| 62 6f 74 68 20 73 69 64 | 65 73 0d 0d 73 65 74 20 |both sid|es..set |
|000005e0| 74 68 65 54 69 6d 65 73 | 20 74 6f 20 74 68 65 54 |theTimes| to theT|
|000005f0| 69 6d 65 73 20 26 20 28 | 28 74 68 65 20 74 69 63 |imes & (|(the tic|
|00000600| 6b 73 29 20 2d 20 73 74 | 54 69 63 6b 73 29 20 2d |ks) - st|Ticks) -|
|00000610| 2d 20 67 65 74 20 65 6e | 64 69 6e 67 20 74 69 63 |- get en|ding tic|
|00000620| 6b 73 20 61 6e 64 20 72 | 65 74 75 72 6e 20 74 69 |ks and r|eturn ti|
|00000630| 6d 65 73 0d 0d 0d 72 65 | 74 75 72 6e 20 74 68 65 |mes...re|turn the|
|00000640| 54 69 6d 65 73 0d 00 00 | 00 00 00 00 00 00 00 00 |Times...|........|
|00000650| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000670| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 00 00 01 00 00 00 01 18 | 00 00 00 18 00 00 00 32 |........|.......2|
|00000690| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 02 93 |........|........|
|000006a0| ac 73 ae 4d 18 51 54 4d | 75 73 69 63 20 53 61 6d |.s.M.QTM|usic Sam|
|000006b0| 0b 74 69 6d 69 6e 67 20 | 64 65 6d 6f 02 00 00 00 |.timing |demo....|
|000006c0| 54 45 58 54 54 6f 79 53 | 01 00 ff ff ff ff 00 00 |TEXTToyS|........|
|000006d0| 00 00 54 45 58 54 54 6f | 79 53 01 00 ff ff ff ff |..TEXTTo|yS......|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 00 00 ac 83 cd ab 00 00 | 05 c6 00 00 01 4a 57 20 |........|.....JW |
|00000700| 4d 43 50 6c 61 79 4d 6f | 76 69 65 00 00 00 00 00 |MCPlayMo|vie.....|
|00000710| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00000720| 00 00 0f f8 ab bc 42 cf | 0f 41 70 70 6c 65 20 44 |......B.|.Apple D|
|00000730| 6f 63 56 69 65 77 65 72 | 32 34 00 00 00 00 00 00 |ocViewer|24......|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 02 00 00 74 ea |........|......t.|
|00000750| ac 82 42 32 0c 4d 57 20 | 50 6c 61 79 4d 6f 76 69 |..B2.MW |PlayMovi|
|00000760| 65 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |e.......|........|
|00000770| 00 00 00 00 00 00 00 03 | 00 00 0d 41 ab ba c5 b5 |........|...A....|
|00000780| 00 00 00 14 00 a5 00 67 | 01 66 01 f9 00 28 00 02 |.......g|.f...(..|
|00000790| 01 dd 02 5d 00 00 00 01 | 00 00 01 00 00 00 01 18 |...]....|........|
|000007a0| 00 00 00 18 00 00 00 32 | 00 e1 6c e8 21 6c 00 00 |.......2|..l.!l..|
|000007b0| 00 1c 00 32 00 00 57 50 | 6f 73 00 00 00 0a 00 80 |...2..WP|os......|
|000007c0| ff ff 00 00 00 00 00 e1 | 79 50 00 00 00 00 00 00 |........|yP......|
|000007d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+